home *** CD-ROM | disk | FTP | other *** search
/ ...taking it to the Macs! / ...taking it to the Macs!.iso / Extras / ActiveX Mac SDK / ActiveX SDK / Sample Controls / Menus / CPopupMenuTracker.cp < prev    next >
Encoding:
Text File  |  1996-12-20  |  4.2 KB  |  167 lines  |  [TEXT/CWIE]
  1.  
  2. ///////////////////////////////////////////////////////////////////////////////
  3. //
  4. // CPopupMenuTracker.cp
  5. //
  6.  
  7. #include "ocheaders.h"
  8. #include "FnAssert.h"
  9. #include "CPopupMenuTracker.h"
  10.  
  11.  
  12. ///////////////////////////////////////////////////////////////////////////////
  13. //
  14. // Private Data Structures & constants
  15. //
  16.  
  17. union Converter
  18. {
  19.     struct
  20.     {
  21.         short hiWd, loWd;
  22.     } shortVal;
  23.     long message;
  24. };
  25.  
  26. const short bulletMark = 165; // char code 165 = bullet mark in most fonts
  27.  
  28. ///////////////////////////////////////////////////////////////////////////////
  29. //
  30. // CPopupMenuTracker::CPopupMenuTracker
  31. //
  32.  
  33. CPopupMenuTracker::CPopupMenuTracker(    CPopupMenuControl *    control,
  34.                         MenuHandle            itsMenu,
  35.                         short                currentItemNumber,
  36.                         short                fontID,
  37.                         short                fontSize)
  38. {
  39.     ASSERT((control!= NULL), "NULL control in temporary popup!");
  40.     
  41.     mControl                = control;
  42.     mMenu                     = itsMenu;
  43.     mCurrentItem.itemNumber    = currentItemNumber;
  44.     mFontID                    = fontID;
  45.     mFontSize                = fontSize;
  46.  
  47. //    AcquirePort();
  48.         
  49.     if (::CountMItems(itsMenu) > 0)
  50.         ::CalcMenuSize(itsMenu);
  51.     
  52.     if (mMenu)
  53.         ::InsertMenu(mMenu, hierMenu);
  54. } 
  55.  
  56. ///////////////////////////////////////////////////////////////////////////////
  57. //
  58. // CPopupMenuTracker::CPopupMenuTracker
  59. //
  60.  
  61. CPopupMenuTracker::CPopupMenuTracker(    CPopupMenuControl *    control,
  62.                         MenuHandle            itsMenu,
  63.                         short                currentItemNumber)
  64. {
  65.     mControl                = control;
  66.     mMenu                     = itsMenu;
  67.     mCurrentItem.itemNumber    = currentItemNumber;
  68.     mFontID                    = geneva;
  69.     mFontSize                = 9;
  70.     
  71.     if (::CountMItems(itsMenu) > 0)
  72.         ::CalcMenuSize(itsMenu);
  73.     
  74.     if (mMenu)
  75.         ::InsertMenu(mMenu, hierMenu);
  76.         
  77. } 
  78.  
  79. ///////////////////////////////////////////////////////////////////////////////
  80. //
  81. // CPopupMenuTracker::~CPopupMenuTracker
  82. //
  83.  
  84. CPopupMenuTracker::~CPopupMenuTracker()
  85. {
  86.     if (mMenu)
  87.     {
  88.         short theMenuID = (*mMenu)->menuID;
  89.         ::DeleteMenu(theMenuID);
  90.     }
  91. } 
  92.  
  93. ///////////////////////////////////////////////////////////////////////////////
  94. //
  95. // CPopupMenuTracker::TrackMouse
  96. //
  97.  
  98. short CPopupMenuTracker::TrackMouse(Point& theMouse)
  99. {
  100.     if (mMenu)
  101.     {
  102.         // Note: we're assuming theMouse is in global coordinates, so theres
  103.         // no need to call ::LocalToGlobal(&theMouse);
  104.  
  105.         short savedFontFamily    = LMGetSysFontFam();    //%BD jdo 28oct96    modified to live in Copland world
  106.         short savedFontSize        = LMGetSysFontSize();    //%BD jdo 28oct96    ditto
  107.         
  108.         // set up for our work:
  109.         LMSetSysFontFam(mFontID);            //%BD jdo 28oct96    set font ID - using supported API
  110.         LMSetSysFontSize(mFontSize);        //%BD jdo 28oct96    set font size - using supported API
  111.         LMSetLastSPExtra( -1);                 //%BD jdo 28oct96    forces the font manager to re-cache the sysfont & size - use supported API
  112.         
  113.         SetItemMark(mMenu, mCurrentItem.itemNumber, bulletMark); 
  114.         
  115.         Converter menuResult;
  116.         menuResult.message = PopUpMenuSelect(mMenu, theMouse.v, theMouse.h, mCurrentItem.itemNumber); 
  117.         
  118.         SetItemMark(mMenu, mCurrentItem.itemNumber, noMark);
  119.         
  120.         // put things back the way we found them:
  121.         LMSetSysFontFam(savedFontFamily);    //%BD jdo 28oct96    modified to live in Copland world
  122.         LMSetSysFontSize(savedFontSize);    //%BD jdo 28oct96    ditto
  123.         LMSetLastSPExtra( -1);                 //%BD jdo 28oct96    forces the font manager to re-cache the sysfont & size - use supported API
  124.             
  125.         if (menuResult.shortVal.loWd)
  126.             mCurrentItem.itemNumber = menuResult.shortVal.loWd;
  127.     }
  128.     
  129.     return mCurrentItem.itemNumber;
  130. } 
  131.  
  132. ///////////////////////////////////////////////////////////////////////////////
  133. //
  134. // CPopupMenuTracker::GetCurrentItem
  135. //
  136.  
  137. void CPopupMenuTracker::GetCurrentItem(CMenuItem * menuItem)
  138. {
  139.     ASSERT(menuItem != NULL, "Null menu item object in CPopupMenuTracker::GetCurrentItem");
  140.     
  141.     menuItem->itemNumber = GetCurrentItemNumber();
  142.     strcpy(menuItem->itemText, GetCurrentItemText());
  143. } 
  144.  
  145. ///////////////////////////////////////////////////////////////////////////////
  146. //
  147. // CPopupMenuTracker::GetCurrentItemNumber
  148. //
  149.  
  150. short CPopupMenuTracker::GetCurrentItemNumber(void)
  151. {
  152.     return mCurrentItem.itemNumber;    
  153. } 
  154.  
  155. ///////////////////////////////////////////////////////////////////////////////
  156. //
  157. // CPopupMenuTracker::GetCurrentItemText
  158. //
  159.  
  160. char * CPopupMenuTracker::GetCurrentItemText(void)
  161. {
  162.     ::GetItem(mMenu, mCurrentItem.itemNumber, ((StringPtr)mCurrentItem.itemText));
  163.     p2cstr(((StringPtr)mCurrentItem.itemText));
  164.     
  165.     return mCurrentItem.itemText;
  166. } 
  167.